Workplace Effectiveness:…ecision-Making Strategies/Workplace Effectiveness: Decision-Making Strategies.iso/pc/Files/Whowhat.dxr/00004_drag.ls

Text File | 1998-12-16 | 360 b | 22 lines

property buttonActive

on mouseDown me
  set buttonActive to 1
end

on mouseUp me
  set buttonActive to 0
end

on mouseUpOutSide me
  set buttonActive to 0
end

on prepareFrame me
  if buttonActive = 1 then
    set the locH of sprite the spriteNum of me to the mouseH
    set the locV of sprite the spriteNum of me to the mouseV
    updateStage()
  end if
end